home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 3 / Info_Mac_1994-01.iso / Applications / Pica Calculator 2 / PC2 Folder / PC2 Sample Pgms / PC2 Sample Pgms.rsrc / pPGM_16889_Combinations < prev    next >
Text File  |  1993-07-16  |  231b  |  41 lines
  1. !TI-57 Example
  2. !by Jim Lewis
  3. ! 
  4. ◊Factorial
  5. s0
  6. »Loop
  7. r0
  8. *
  9. º0
  10. GLoop
  11. #1
  12. =
  13. ^
  14. ! 
  15. !Main Program
  16. ?Total possible elements?
  17. s5
  18. ƒFactorial
  19. s1
  20. ~
  21. ?Number of picks?
  22. s6
  23. ƒFactorial
  24. s2
  25. r5
  26. -
  27. r6
  28. =
  29. ƒFactorial
  30. s3
  31. r1
  32. /
  33. (
  34. r3
  35. *
  36. r2
  37. )
  38. =
  39. “
  40. @Odds are 1 in:
  41.